home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998…eptember: Technology Seed / September 98 ADC Seed CD.toast / LaserWriter 8.6b5 Seed / LaserWriter 8.6b5 / PrintingLib / PrintingLib.rsrc / PS_-8135 < prev    next >
Encoding:
Text File  |  1998-08-12  |  322 b   |  20 lines
  1. %%?BeginFeatureQuery: *?Resolution
  2. /mstr 40 string def
  3. initgraphics
  4. 72 0 dtransform
  5. dup mul exch dup mul add sqrt .25 add round
  6. cvi
  7. 0 72 dtransform
  8. dup mul exch dup mul add sqrt .25 add round
  9. cvi 2 copy eq
  10. {
  11. pop
  12. mstr cvs print
  13. }{
  14. exch
  15. mstr cvs print(x)print
  16. mstr cvs print
  17. }ifelse
  18. (dpi\n)print
  19. %%?EndFeatureQuery: Unknown
  20.